Fahrplan

1PL Modell

\[ logit(P(X_{pi}=1)) = \theta_p - \beta_i \]

  • Logit: Transformation unseres linearen Terms, damit die Werte zwischen 0 und 1 liegen. Wahrscheinlichkeit \(p\) durch Gegenwahrscheinlichkeit \(1-p\).
  • Inverse der logit ist die logistische Funktion.

1PL Modell: Umformen

\[ logit(P(X_{pi}=1)) = \ln\left(\frac{P(X_{pi}=1)}{1-P(X_{pi}=1)}\right) = \theta_p - \beta_i \]

1PL Modell: Umformen

\[ \frac{p_{pi}}{1-p_{pi}} = exp(\theta_p - \beta_i) \]

\[ p_{pi} = exp(\theta_p - \beta_i)*( 1-p_{pi}) \]

1PL Modell: Umformen

\[ p_{pi} + p_{pi} * exp(\theta_p - \beta_i) = exp(\theta_p - \beta_i) \]


\[ p_{pi} + p_{pi} * exp(\theta_p - \beta_i) = exp(\theta_p - \beta_i) \]


\[ p_{pi}*(1+exp(\theta_p - \beta_i)) = exp(\theta_p - \beta_i) \]

1PL Schreibweise 1

\[ P(X_{pi}=1) = \frac{exp(\theta_p - \beta_i)}{1 + exp(\theta_p - \beta_i)} \]

1PL Schreibweise 2

\[ P(X_{pi}=1) = \frac{e^{\theta_p - \beta_i}}{1 + e^{\theta_p - \beta_i}} \]

1PL Schreibweise 3

\[ P(X_{pi}=1) = \frac{1}{1 + e^{\color{#9B1B34}{-}\theta_p \color{#9B1B34}{+} \beta_i}} \]

Beispiel

\[ \frac{exp(1 - 0.8)}{1 + exp(1 - 0.8)} = 0.55 \]

Wahrscheinlichkeit einer richtigen Antwort über 0.5, wenn \(\theta_p > \beta_i\).

Beispiel

\[ \frac{exp(0.8 - 1)}{1 + exp(0.8 - 1)} = 0.45 \]

Wahrscheinlichkeit einer richtigen Antwort unter 0.5, wenn \(\theta_p < \beta_i\).

Höher parametrisierte   IRT Modelle

Neue Paramter

Wir können Parameter zu diesem Modell hinzufügen, wodurch wir flexibler in der Modellierung werden:

  • Schwierigkeit \(\beta_i\) (Intercept)
  • Steigung \(\alpha\) (Faktorladung, Diskriminationsparameter)
  • Ratewahrscheinlichkeit \(\gamma_i\)

3PL

\[ P(X_{pi}=1) = \color{#aaa938}{\gamma_i} + (1-\color{#aaa938}{\gamma_i})\frac{exp(\color{#F4BA02}{\alpha_i}(\theta_p - \color{#99D9DD}{\beta_i})))}{1 + exp(\color{#F4BA02}{\alpha_i}(\theta_p - \color{#99D9DD}{\beta_i}))} \]

  • Schwierigkeit
  • Diskriminationsparamter
  • Ratewahrscheinlichkeit
    • z.B. bei 4 Antwortmöglichkeiten: \(\gamma_i = 1/4 = 0.25\)

2PL

\(\gamma_i = 0\)

\[ P(X_{pi}=1) = \color{#9B1B34}{0} + (1-\color{#9B1B34}{0})\frac{exp(\alpha_i(\theta_p - \beta_i)))}{1 + exp(\alpha_i(\theta_p - \beta_i))} \]

1PL

\(\alpha_i = 1\)

\[ P(X_{pi}=1) = 0 + (1-0)\frac{exp(\color{#9B1B34}{1}(\theta_p - \beta_i)))}{1 + exp(\color{#9B1B34}{1}(\theta_p - \beta_i))} \]

Darstellung

Simulieren von IRT Daten

Jetzt ist ein guter Zeitpunkt, und uns ein sehr mächtiges Werkzeug anzuschauen: Datensimulation.

Übung

Geht zur Übung und probiert euch aus.

Welches Modell?

1PL vs. 3PL

Modellfit beurteilen

  • Gesamtmodell
  • Itemfit
  • Personenfit

Gesamten Modellfit

Es gibt verschiedene Fit-Statistiken, die uns bei Aussagen über den Modellfit helfen, z.B.:

Deviance

Deviance ist ein Maß für die relative Distanz einer Vorhersage von perfeketer Accuracy.
Wir können uns die Konvergenzplots anschauen:

Code
library(TAM)

data(data.sim.rasch)

mod_2pl <- tam.mml.2pl(resp = data.sim.rasch, verbose = FALSE, irtmodel = "2PL")

plotDevianceTAM(mod_2pl)

Fit Indices (z.B. AIC, BIC)

Da die Deviance (fast) immer besser wird, je mehr Parameter wir ins Modell mit aufnehmen, bestrafen bestimmte Fit Indices die Anzahl der Parameter.
Schätzen die out-of-Sample predictive accuracy.
Es gibt keine Daumenregeln für Cutoff Werte, allerdings können wir die Fit Indices für den Vergleich von genesteten Modellen nutzen.

**** Calculate Residuals 
**** Calculate Counts 
**** Calculate Covariances 
Test of Global Model Fit (Maximum Chi Square)
    maxX2 Npairs p.holm
1 9.79789    780      1

MADaQ3 Statistic and Test of Global Model Fit (Maximum aQ3)
  MADaQ3 maxaQ3      p
1 0.0179 0.0851 0.1082

Summary of Q3 and adjusted Q3 statistics (based on posterior distribution)
  type       M     SD     min    max  SGDDM wSGDDM
1   Q3 -0.0228 0.0227 -0.1011 0.0622 0.0263 0.0263
2  aQ3  0.0000 0.0227 -0.0783 0.0851 0.0179 0.0179

Fit Statistics
100*MADCOV       SRMR      SRMSR 
     0.281      0.014      0.018 

Inferenzstatistisch

Wir könne auch den Likelihood Ratio Test nutzen, um die Modelle zu vergleichen. Er erlaubt zum einen den Vergleich der empirischen und der Modellimplizierten Kovarianzmatrix, aber auch den Vergleich der Kovarianzmatrizen genesteter Modelle.

Hängt von der Stichprobengröße ab und hat auch einige weitere Probleme. Sollte deshalb nicht in Isolation genutzt werden, sondern möglichst mit den besprochenen deskriptiven Fitmaßen zusammen.

Itemfit

Um den Itemfit zu beurteilen, plotten wir die erwarteten und die beobachteten Itemkurven übereinander:

Code
invisible(
plot(mod_2pl,
  items = 1:3, 
  type = "items",
  export = FALSE,
  observed = TRUE,
  package = "graphics")
)

Itemfit

Achtung! Die grafische Überprüfung ist stark von der Binwidth abhängig, die man wählt.

Infit/Outfit

Item fit calculation based on 15 simulations
|**********|
|----------|
$itemfit
   parameter    Outfit    Outfit_t  Outfit_p Outfit_pholm     Infit
1         I1 0.9785356 -0.55800512 0.5768409            1 0.9993789
2         I2 0.9848326 -0.41814886 0.6758383            1 1.0029237
3         I3 0.9955127 -0.12836381 0.8978611            1 0.9965056
4         I4 0.9707268 -0.92332458 0.3558381            1 1.0090042
5         I5 0.9870875 -0.41036912 0.6815352            1 1.0045131
6         I6 0.9769033 -0.75148660 0.4523599            1 1.0033649
7         I7 1.0179929  0.59721868 0.5503614            1 0.9982034
8         I8 1.0139592  0.49354771 0.6216256            1 0.9960376
9         I9 1.0169452  0.62212119 0.5338622            1 0.9982879
10       I10 0.9974388 -0.09490422 0.9243909            1 1.0002427
11       I11 0.9905551 -0.36763535 0.7131452            1 1.0052363
12       I12 0.9965735 -0.13474310 0.8928150            1 0.9988104
13       I13 0.9838602 -0.71270206 0.4760301            1 1.0024842
14       I14 1.0206224  0.85418663 0.3930016            1 0.9993637
15       I15 1.0118959  0.57482516 0.5654096            1 0.9973684
16       I16 1.0023271  0.11070623 0.9118493            1 0.9982381
17       I17 1.0304953  1.53854459 0.1239155            1 0.9970462
18       I18 1.0008694  0.04840286 0.9613952            1 1.0042235
19       I19 0.9953154 -0.22073157 0.8253015            1 1.0043261
20       I20 1.0048605  0.23895547 0.8111401            1 1.0022726
21       I21 1.0140379  0.72295543 0.4697073            1 0.9994714
22       I22 0.9887561 -0.56415170 0.5726509            1 1.0051232
23       I23 1.0017848  0.09047164 0.9279124            1 1.0051302
24       I24 1.0109577  0.50151261 0.6160104            1 0.9951776
25       I25 0.9831624 -0.76521873 0.4441413            1 1.0005357
26       I26 1.0156020  0.68654785 0.4923677            1 0.9994006
27       I27 1.0104664  0.48439697 0.6281042            1 0.9984106
28       I28 0.9900510 -0.42531820 0.6706047            1 1.0056466
29       I29 0.9625899 -1.49006425 0.1362073            1 1.0075472
30       I30 1.0243419  1.01404414 0.3105617            1 0.9956174
31       I31 1.0133580  0.51359591 0.6075345            1 0.9985324
32       I32 1.0042025  0.17106915 0.8641694            1 1.0032714
33       I33 0.9721060 -0.97891248 0.3276232            1 1.0057336
34       I34 1.0102252  0.37315002 0.7090368            1 1.0037545
35       I35 0.9904346 -0.30509118 0.7602967            1 0.9969572
36       I36 0.9966005 -0.10048137 0.9199622            1 1.0006213
37       I37 0.9745188 -0.76091662 0.4467069            1 1.0009562
38       I38 1.0368709  1.03963071 0.2985115            1 0.9978774
39       I39 0.9863283 -0.36169287 0.7175816            1 1.0044472
40       I40 1.0531019  1.33348717 0.1823720            1 0.9886781
        Infit_t   Infit_p Infit_pholm
1  -0.004611465 0.9963206           1
2   0.092401514 0.9263790           1
3  -0.092775597 0.9260818           1
4   0.291523536 0.7706509           1
5   0.154645047 0.8771012           1
6   0.118400094 0.9057507           1
7  -0.053695950 0.9571774           1
8  -0.130195583 0.8964117           1
9  -0.055151835 0.9560175           1
10  0.017736324 0.9858492           1
11  0.212255177 0.8319080           1
12 -0.041566574 0.9668442           1
13  0.116049445 0.9076134           1
14 -0.019290498 0.9846094           1
15 -0.121642382 0.9031822           1
16 -0.075696747 0.9396604           1
17 -0.145984223 0.8839338           1
18  0.216814488 0.8283529           1
19  0.210393551 0.8333605           1
20  0.115270441 0.9082308           1
21 -0.022228488 0.9822657           1
22  0.262291014 0.7930971           1
23  0.255106535 0.7986408           1
24 -0.213746223 0.8307450           1
25  0.027517631 0.9780469           1
26 -0.019549078 0.9844031           1
27 -0.066559598 0.9469323           1
28  0.247860736 0.8042422           1
29  0.303923707 0.7611860           1
30 -0.177842520 0.8588467           1
31 -0.048908498 0.9609922           1
32  0.135930147 0.8918765           1
33  0.208770099 0.8346277           1
34  0.142664920 0.8865548           1
35 -0.087656872 0.9301494           1
36  0.028655199 0.9771396           1
37  0.039057828 0.9688443           1
38 -0.049943037 0.9601678           1
39  0.129539617 0.8969307           1
40 -0.275770440 0.7827244           1

$time
[1] "2024-10-17 18:21:15 UTC" "2024-10-17 18:21:15 UTC"

$CALL
tam.fit(tamobj = mod_2pl)

attr(,"class")
[1] "tam.fit"

Infit/Outfit

Item fit calculation based on 15 simulations
|**********|
|----------|

Personfit

Wie gut stimmen die Antwortmuster der Personen mit dem Modell überein?

Infit Outfit

Mögliche weitere Fragestellungen

Wir können uns noch viele weitere Dinge mit unseren Modellen anschauen. Sehr hilfreich dabei kann das Paket ggmirt sein, dass eine Vielzahl von praktischen Plots für die Auswertung bereitstellt.

Item Person Map

Ist die Fähigkeitsrange durch die Items gut Abgedeckt?

ICC

ICC

Item Information Curves

Wie viel Information steuert jedes Item zur Schätzung von Theta bei?

Item Information Curves

Test Information Curve

Summary

Zusammenfassung verschiedener Plots

Tradeoff zwischen Underfit und Overfit

Tradeoff zwischen Underfit und Overfit

Tradeoff zwischen Underfit und Overfit

Mögliche Punkte

Mehr Parameter müsen nicht immer auch besser sein. Gerade im IRT-Kontext können komplexere Modelle schnell an ihre Grenzen kommen und nicht konvergieren.
1PL Modelle sind außerdem nicht so sehr von den tatsächlichen Daten abhängig (ähnlich wie die lineare Regression im Beispiel) und damit ähnlicher über verschiedene Datenerhebungen (da es weniger Möglichkeiten gibt, sich direkt an die Daten anzupassen).

Bei Modellwahl zu beachten:

  • Gewichtung der Items
  • Antwortskala
  • Simulation/Modellfit
  • Ziel

Was tun bei polytomen Items?

Beispielaufgabe

Ich bin bequem, neige zur Faulheit.

(trift überhaupt nicht zu) 1 … 2 … 3 … 4 … 5 (trift voll und ganz zu)

Wie?

Partial Credit

Grundidee

Den einzelnen Antwortkategorien wird eine eigene Schwierigkeit zugeordnet. Dadurch können wir die Antwortwahrscheinlichkeit in einer bestimmten Kategorie berechnen.

Anwendungsbereich

Ordinale Daten (geordnete Antwortkategorien), z.B.:

  • Likert-Skalen
  • Items, die auch mit Teilpunkten bewertet werden können (z.B. in Mathe)

Darstellung

Formel

\[ \pi_{pix}= P(X_{pi}=x|\theta_p, \beta_{ik})= \frac{exp[\sum^x_{j=0}(\theta_p-\beta_{ij})]}{1+exp[\sum^k_{j=0}(\theta_p-\beta_{ij})]} \] ::: aside

  • Person \(p\)
  • Item \(i\)
  • Personenscore \(x\)

:::

Partial Credit Model

\[ \pi_{pix}= \color{#9B1B34}{P(X_{pi}=x|\theta_p, \beta_{ik})}= \frac{exp[\sum^x_{j=0}(\theta_p-\beta_{ij})]}{1+exp[\sum^k_{j=0}(\theta_p-\beta_{ij})]} \]

Partial Credit Model

\[ \pi_{pix}= P(X_{pi}=x|\theta_p, \beta_{ik})= \frac{exp[\sum^x_{j=0}\color{#9B1B34}{(\theta_p-\beta_{ij})}]}{1+exp[\sum^k_{j=0}(\theta_p-\beta_{ij})]} \]

Wichtig:\(\beta_{i\color{#9B1B34}{j}}\) ist jetzt der Schwellenparameter der Kategorie \(j\) des Items \(i\).

Raw score curve

Übung

Gehe zur Partial-Credit-Übung und bearbeite sie.

Bildquellen